home *** CD-ROM | disk | FTP | other *** search
/ HTBasic 9.3 / HTBasic 9.3.iso / 83win / data1.cab / Basic_Plus_Examples / STRGDIAL < prev    next >
Encoding:
Text File  |  2001-03-02  |  696 b   |  22 lines
  1. 10    ! ***********************************************
  2. 20    ! Example: STRING Dialog
  3. 30    !
  4. 40    ! This program creates a STRIG dialog. If you move
  5. 50    ! the mouse cursor or tab into the text field below
  6. 60    ! the prompt, you can input text into the dialog that
  7. 70    ! is returned through the S$ string.
  8. 80    !
  9. 90    ! ***********************************************
  10. 100   !
  11. 110  DIM P$[25],S$[50]
  12. 120  INTEGER Btn
  13. 130  P$="Please enter your name"
  14. 140  DIALOG "STRING",P$,Btn;SET ("TITLE":" Example: STRING Dialog"),RETURN ("VALUE":S$)
  15. 150  SELECT Btn
  16. 160  CASE 0
  17. 170      DISP "Name entered:",S$
  18. 180  CASE 1
  19. 190      DISP "Input canceled"
  20. 200  END SELECT
  21. 210  END
  22.